home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 60.zip / BS1 part 60 / Agfa Fonts^4.adf / IntellifontSystemCheck < prev    next >
Text File  |  1992-02-12  |  4KB  |  156 lines

  1. ; This installer script will check for the Intellifont outline font engine.
  2. ; Before outlines can be installed, we must ensure the system has the 
  3. ; outline engine installed and the latest version of:
  4. ;     diskfont.library
  5. ;     fountain
  6. ;
  7. ;
  8. ; diskfont.library version 37.58 and fountain version 37.10 
  9. ; are shipped with AmigaDOS2.04
  10.  
  11. (set @default-dest "Fonts:_Bullet_Outlines")
  12.  
  13. ; Before we begin the install, we need to check for Intellifont 
  14. ; First, check version of system files: diskfont.library and fountain 
  15. ; Second, check for Fonts:_bullet and Fonts:_bullet_outlines
  16. ; _Bullet contains Intellifont related files. 
  17. ; _Bullet_outlines contains Intellifont Outlines.
  18.  
  19.  
  20. ; check if "fountain is loaded
  21.  
  22. (if (not (exists "sys:system/fountain")) 
  23.  
  24.    ( ;no
  25.       (message "The \"Fountain\" program is not installed.\n "
  26.       " For information on Fountain, please consult your AmigaDOS manual ")
  27.         (abort " Sorry, your system is not configured correctly."
  28.              " Please refer to Appendix D in your AmigaDOS manual")
  29.       )
  30.    )
  31.  
  32.  
  33. ; check if Intellifont directory and support files are installed
  34. (if (exists "fonts:_bullet")
  35.     
  36.  (
  37.   
  38.     ;The new IF.SS contains additional TypeDirecter symbol sets 
  39.  
  40.    (set ifssSize (getsize "fonts:_bullet/if.ss"))
  41.  
  42.    (if (< ifssSize 1)
  43.        (abort " Sorry, your system is not configured correctly."
  44.              " For information on the Outline Font Option,"
  45.              " please refer to your AmigaDOS manual"
  46.        )
  47.               
  48.    )
  49.  
  50.  
  51.  
  52.    (if (> 2000 ifssSize)
  53.        (
  54.        (run "copy fonts:_bullet/if.ss to fonts:_bullet/if.ss.org")
  55.            
  56.          (copyfiles
  57.             (prompt "Copying new symbol set maps. With these maps, you can access"
  58.              " 585+ Intellifont characters, and the Agfa ITC Zapf Dingbats Outline ")
  59.           (help @copyfiles-help)
  60.           (source "df0:Intellifontfiles")
  61.           (dest "fonts:_bullet")
  62.           (pattern "if.ss")
  63.           (files)
  64.          (confirm)
  65.          )
  66.        )  
  67.     )        
  68.  
  69. ; HQ3 files and a new IF.SS will be copied to _Bullet directory       
  70.  
  71. (if (not (exists "fonts:_bullet/hq3updt.tyq")) 
  72.        
  73.        (copyfiles
  74.              (prompt "Copying all Intellifont support files.")
  75.              (help @copyfiles-help)
  76.              (source "df0:IntellifontFiles")
  77.              (dest "fonts:_bullet")
  78.              (pattern "HQ3#?.?#?")
  79.              (files)
  80.              (confirm)
  81.          )
  82.       )
  83.    )
  84.    (
  85.       (message 
  86.             "The directory, Fonts:_Bullet, does not exist."
  87.             " Without this directory, the Agfa Intellifont fonts can not be used."
  88.             " \nTo install the Intellifont technology, please consult your AmigaDOS manual."
  89.             )
  90.       (abort " Sorry, your system is not configured correctly."
  91.              " For information on the Outline Font Option,"
  92.              " please refer to your AmigaDOS manual"
  93.               )
  94.     )          
  95. )
  96.  
  97.  
  98. ; check diskfont.lib version
  99. ; For AmigaDOS2.04,  diskfont.lib version 37.58 must be installed
  100.  
  101. (set dskfontVer (getversion "sys:libs/diskfont.library"))
  102.  
  103.  
  104. (set dskfontVer (/ dskfontVer 65535))
  105.  
  106.  
  107.  
  108. ; if diskfont.lib version is less then 37, can't install
  109.  
  110. (if (not (>= dskfontVer 37))
  111.  
  112.       (
  113.        (message"\n" 
  114.                "Your current installed version of \"diskfont.library\" does not "
  115.                " support Agfa Intellifont Typefaces."
  116.                "\n"
  117.                " You need AmigaDOS2.04 with the Outline Font Option installed'\n' "
  118.                "\n"
  119.                " For additional information, please consult your AmigaDOS manual " 
  120.                )
  121.             (abort "Sorry, your system is not properly configured."
  122.                 " For additional information on installing the"     
  123.             " Outline font option, please consult your AmigaDOS manual."
  124.             )
  125.       )   
  126. )
  127.  
  128.  
  129.  
  130.  
  131. ; if everything is setup, execute fountain for the user
  132. (run "sys:system/fountain" 
  133.  
  134.    (prompt 
  135.          "\n To Install Agfa Intellifont typefaces, please insert the typeface"
  136.          " disk, and select Proceed."
  137.          " \n \n This will execute the Fountain utility."
  138.    )
  139.     
  140.    (help 
  141.          " Fountain is the AmigaDOS system file that installs all Agfa Intellifont"
  142.          " Typeface Outlines. If you select Proceed, the installer will" 
  143.          " execute Fountain. \n After Fountain completes its setup, set df0: as the"
  144.          " Outline Font Source."
  145.    )
  146.     
  147.    (confirm)
  148. )
  149.  
  150.  
  151. (exit)
  152.  
  153.  
  154.